#pragma once

#include <iostream>
#include <memory>
#include <unistd.h>
#include "Socket.hpp"

using namespace SocketModule;
using namespace LogModule;

class SelectServer
{
    const static int size = sizeof(fd_set) * 8;
    const static int defaultfd = -1;

public:
    SelectServer(int port) : _listensock(std::make_unique<TcpSocket>()), _isrunning(false)
    {
        // 1. 创建套接字并绑定端口号并开始进行监听
        _listensock->BuildTcpSocketMethod(port);

        // 2. 将 fd 辅助数组全部默认设置为 -1
        for (int i = 0; i < size; ++i)
            _fd_array[i] = defaultfd;

        // 3. 将 fd 辅助数组中的首元素设置为监听套接字的 fd
        _fd_array[0] = _listensock->Fd();
    }

    void Start()
    {
        _isrunning = true;

        while (_isrunning)
        {
            fd_set rfds;    // 定义需要监听读事件的 fd 集合
            FD_ZERO(&rfds); // 清空 fds
            int maxfd = defaultfd;
            for (int i = 0; i < size; ++i)
            {
                // 循环找到每个有效的 fd
                if (_fd_array[i] == defaultfd)
                    continue;
                // 1. 每次 select 前对 rfds 进行重置（因为 select 执行之后会改变 rfds）
                FD_SET(_fd_array[i], &rfds);
                // 2. 每次需要关心的 fd 集合都有变换，更新最大的 fd
                if (maxfd < _fd_array[i])
                    maxfd = _fd_array[i];
            }
            PrintFd();

            int n = select(maxfd + 1, &rfds, nullptr, nullptr, nullptr);
            switch (n)
            {
            case -1:
                // select 错误
                LOG(LogLevel::ERROR) << "select error";
                break;
            case 0:
                // 2. 阻塞等待超时
                LOG(LogLevel::INFO) << "time out...";
                break;
            default:
                // 3. 读事件就绪（listen 套接字也是读事件就绪）
                LOG(LogLevel::DEBUG) << "读事件就绪..., n: " << n;
                Dispatcher(rfds);   // 进行事件派发
                break;
            }
        }

        _isrunning = false;
    }

    void Stop() {
        _isrunning = false;
    }

    ~SelectServer() {}

    // 事件派发器
    void Dispatcher(fd_set& rfds) {
        for (int i = 0; i < size; ++i) {
            // 1. 排除不合法的 fd
            if (_fd_array[i] == defaultfd)
                continue;
            if (FD_ISSET(_fd_array[i], &rfds)) {
                if (_fd_array[i] == _listensock->Fd())
                    Accepter();
                else
                    Recver(i);
            }
        }
    }

    // 连接管理器
    void Accepter() {
        InetAddr client;
        int sockfd = _listensock->Accept(&client);  // 此时的 accept 不会被阻塞
        if (sockfd >= 0) {
            LOG(LogLevel::INFO) << "get a new link, sockfd: " << sockfd << ", client is: " << client.StringAddr();
            // 将新连接托管给 select
            int pos = 0;
            for (; pos < size; ++pos)
                if (_fd_array[pos] == defaultfd)
                    break;

            if (pos == size) {
                LOG(LogLevel::WARNING) << "select server full";
                close(sockfd);
            } else
                _fd_array[pos] = sockfd;
        }
    }

    // IO处理器
    void Recver(int pos) {
        char buffer[1024];
        ssize_t n = recv(_fd_array[pos], buffer, sizeof(buffer) - 1, 0);    // 这里读的时候会有 bug，不能保证一次读取全部的数据
        if (n > 0) {
            // 1. 读取到客户端传入的数据
            buffer[n] = 0;
            std::cout << "sockfd: " << _fd_array[pos] << ", client say@ " << buffer << std::endl;
        } else if (n == 0) {
            // 2. 客户端退出 -- 将该客户端的 fd 移除辅助数组并关闭连接
            LOG(LogLevel::INFO) << "sockfd: " << _fd_array[pos] << ", client quit...";
            _fd_array[pos] = defaultfd;
            close(_fd_array[pos]);
        } else {
            // 3. 读取出错 -- select 不再关心该 fd，并关闭连接
            LOG(LogLevel::ERROR) << "recv error";
            _fd_array[pos] = defaultfd;
            close(_fd_array[pos]);
        }
    }

    void PrintFd()
    {
        std::cout << "_fd_array[]: ";
        for (int i = 0; i < size; ++i)
            if (_fd_array[i] != defaultfd)
                std::cout << _fd_array[i] << " ";
        std::cout << std::endl;
    }

private:
    std::unique_ptr<Socket> _listensock;
    bool _isrunning;
    int _fd_array[size]; // 栈上定义数组时（包括函数内，类成员函数内以及类中），数组大小必须是编译期确定的常量，只使用 const 修饰的变量是在运行时定义的
};